inherited frmContas: TfrmContas
  Left = 266
  Top = 117
  Caption = '-'
  ClientHeight = 424
  ClientWidth = 569
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel1: TPanel
    Top = 387
    Width = 569
  end
  inherited Panel2: TPanel
    Width = 569
    Height = 387
    inherited Panel3: TPanel
      Width = 567
      Caption = 'Contas'
      inherited GroupBox1: TGroupBox
        Left = 488
      end
    end
    inherited Panel4: TPanel
      Width = 567
      Height = 345
      object Label1: TLabel [0]
        Left = 11
        Top = 7
        Width = 33
        Height = 13
        Caption = 'Codigo'
      end
      object Label2: TLabel [1]
        Left = 11
        Top = 47
        Width = 28
        Height = 13
        Caption = 'Nome'
      end
      inherited DBGrid1: TDBGrid
        Top = 128
        Width = 559
        TabOrder = 3
      end
      inherited SbHints: TStatusBar
        Top = 322
        Width = 559
      end
      object EdtEstCodigo: TDBEdit
        Left = 11
        Top = 21
        Width = 93
        Height = 21
        Hint = 'Codigo da Conta'
        CharCase = ecUpperCase
        DataField = 'CON_CODIGO'
        DataSource = DtSrc
        Enabled = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnExit = EdtEstCodigoExit
      end
      object EdtEstDescri: TDBEdit
        Left = 11
        Top = 60
        Width = 334
        Height = 21
        Hint = 'Descri'#231#227'o da conta  '
        CharCase = ecUpperCase
        DataField = 'CON_DESCRICAO'
        DataSource = DtSrc
        Enabled = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnExit = EdtEstDescriExit
      end
    end
  end
  inherited DtSrc: TDataSource
    DataSet = SQLC_Contas
    Left = 88
    Top = 219
  end
  inherited DtSrcDBGrid: TDataSource
    Top = 222
  end
  object SQLC_Contas: TSQLClientDataSet
    CommandText = 'select * from CONTAS where con_codigo = :pcod;'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftString
        Name = 'pcod'
        ParamType = ptInput
      end>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 86
    Top = 278
  end
end
